Make user setup functions interactive and autoload
authorjustbur <justin@burkett.cc>
Thu, 9 Jul 2015 11:55:48 +0000 (07:55 -0400)
committerjustbur <justin@burkett.cc>
Thu, 9 Jul 2015 11:55:48 +0000 (07:55 -0400)
which-key.el

index 6d08ad384f30cfce940c19f3c1341ad07b3c10a1..351479342086aacbac8107b88f92c9ce5738ffa9 100644 (file)
@@ -160,21 +160,27 @@ Used when `which-key-popup-type' is frame.")
     (setq-local mode-line-format ""))
   (setq which-key--setup-p t))
 
+;;;###autoload
 (defun which-key/setup-side-window-right ()
   "Apply suggested settings for side-window that opens on right."
+  (interactive)
   (setq which-key-popup-type 'side-window
         which-key-side-window-location 'right
         which-key-show-prefix 'top))
 
+;;;###autoload
 (defun which-key/setup-side-window-bottom ()
   "Apply suggested settings for side-window that opens on
 bottom."
+  (interactive)
   (setq which-key-popup-type 'side-window
         which-key-side-window-location 'bottom
         which-key-show-prefix nil))
 
+;;;###autoload
 (defun which-key/setup-minibuffer ()
   "Apply suggested settings for minibuffer."
+  (interactive)
   (setq which-key-popup-type 'minibuffer
         which-key-show-prefix 'left))